﻿Public Class Carta : Implements IEquatable(Of Carta)

    Public Property Id As String
    Public Property Titulo As String
    Public Property Tipo As String
    Public Property Expansion As String
    Public Property Baraja As Baraja
    Public Property Ejemplares As Integer

    Public Sub New()

    End Sub
    Public Sub New(ByVal id As String, ByVal titulo As String, ByVal tipo As String, ByVal expansion As String, ByVal baraja As Baraja, ByVal ejemplares As Integer)

        Me.Id = id
        Me.Titulo = titulo
        Me.Tipo = tipo
        Me.Expansion = expansion
        Me.Baraja = baraja
        Me.Ejemplares = ejemplares

    End Sub

    Public Overloads Function Equals(other As Carta) As Boolean Implements IEquatable(Of Carta).Equals
        Return Me.Id = other.Id
    End Function
End Class
